#!/usr/bin/perl
#index.cgi

require './session-lib.pl';

&header($text{'session_title'}, "", "index", 0, 1);
&get_miniserv_config(\%miniserv);
print "<form action='save_timeout.cgi' method=post onsubmit='document.forms[0].saveok.disabled = true;'>\n";
print "<b>$text{'session_timeout'}</b>\n";
printf "<input name=timeout size=10 class=text value='%s'><p>\n", $miniserv{'logouttime'}?$miniserv{'logouttime'}:"0";
print "<i>$text{'timeout_hint'}</i><p>\n";
print "<input type=submit name=saveok class=button1 value='$text{'submit'}'>\n";
print "</form>\n";
&footer("/", $text{'index'});
